home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / Apple II / Essentials / SANE / SANE1 / GENERIC.MACROS < prev    next >
Encoding:
Text File  |  1985-04-26  |  6.5 KB  |  859 lines  |  [TEXT/pdos]

  1. FADDX
  2.  LDA #FFEXT
  3.  PHA
  4.  LDA #FOADD
  5.  PHA
  6.  JSR FP6502
  7.  
  8. FADDD
  9.  LDA #FFDBL
  10.  PHA
  11.  LDA #FOADD
  12.  PHA
  13.  JSR FP6502
  14.  
  15. FADDS
  16.  LDA #FFSGL
  17.  PHA
  18.  LDA #FOADD
  19.  PHA
  20.  JSR FP6502
  21.  
  22. FADDC
  23.  LDA #FFCOMP
  24.  PHA
  25.  LDA #FOADD
  26.  PHA
  27.  JSR FP6502
  28.  
  29. FADDI
  30.  LDA #FFINT
  31.  PHA
  32.  LDA #FOADD
  33.  PHA
  34.  JSR FP6502
  35.  
  36. FADDL
  37.  LDA #FFLNG
  38.  PHA
  39.  LDA #FOADD
  40.  PHA
  41.  JSR FP6502
  42.  
  43. FSUBX
  44.  LDA #FFEXT
  45.  PHA
  46.  LDA #FOSUB
  47.  PHA
  48.  JSR FP6502
  49.  
  50. FSUBD
  51.  LDA #FFDBL
  52.  PHA
  53.  LDA #FOSUB
  54.  PHA
  55.  JSR FP6502
  56.  
  57. FSUBS
  58.  LDA #FFSGL
  59.  PHA
  60.  LDA #FOSUB
  61.  PHA
  62.  JSR FP6502
  63.  
  64. FSUBC
  65.  LDA #FFCOMP
  66.  PHA
  67.  LDA #FOSUB
  68.  PHA
  69.  JSR FP6502
  70.  
  71. FSUBI
  72.  LDA #FFINT
  73.  PHA
  74.  LDA #FOSUB
  75.  PHA
  76.  JSR FP6502
  77.  
  78. FSUBL
  79.  LDA #FFLNG
  80.  PHA
  81.  LDA #FOSUB
  82.  PHA
  83.  JSR FP6502
  84.  
  85. FMULX
  86.  LDA #FFEXT
  87.  PHA
  88.  LDA #FOMUL
  89.  PHA
  90.  JSR FP6502
  91.  
  92. FMULD
  93.  LDA #FFDBL
  94.  PHA
  95.  LDA #FOMUL
  96.  PHA
  97.  JSR FP6502
  98.  
  99. FMULS
  100.  LDA #FFSGL
  101.  PHA
  102.  LDA #FOMUL
  103.  PHA
  104.  JSR FP6502
  105.  
  106. FMULC
  107.  LDA #FFCOMP
  108.  PHA
  109.  LDA #FOMUL
  110.  PHA
  111.  JSR FP6502
  112.  
  113. FMULI
  114.  LDA #FFINT
  115.  PHA
  116.  LDA #FOMUL
  117.  PHA
  118.  JSR FP6502
  119.  
  120. FMULL
  121.  LDA #FFLNG
  122.  PHA
  123.  LDA #FOMUL
  124.  PHA
  125.  JSR FP6502
  126.  
  127. FDIVX
  128.  LDA #FFEXT
  129.  PHA
  130.  LDA #FODIV
  131.  PHA
  132.  JSR FP6502
  133.  
  134. FDIVD
  135.  LDA #FFDBL
  136.  PHA
  137.  LDA #FODIV
  138.  PHA
  139.  JSR FP6502
  140.  
  141. FDIVS
  142.  LDA #FFSGL
  143.  PHA
  144.  LDA #FODIV
  145.  PHA
  146.  JSR FP6502
  147.  
  148. FDIVC
  149.  LDA #FFCOMP
  150.  PHA
  151.  LDA #FODIV
  152.  PHA
  153.  JSR FP6502
  154.  
  155. FDIVI
  156.  LDA #FFINT
  157.  PHA
  158.  LDA #FODIV
  159.  PHA
  160.  JSR FP6502
  161.  
  162. FDIVL
  163.  LDA #FFLNG
  164.  PHA
  165.  LDA #FODIV
  166.  PHA
  167.  JSR FP6502
  168.  
  169. FSQRTX
  170.  LDA #0
  171.  PHA
  172.  LDA #FOSQRT
  173.  PHA
  174.  JSR FP6502
  175.  
  176. FRINTX
  177.  LDA #0
  178.  PHA
  179.  LDA #FORTI
  180.  PHA
  181.  JSR FP6502
  182.  
  183. FTINTX
  184.  LDA #0
  185.  PHA
  186.  LDA #FOTTI
  187.  PHA
  188.  JSR FP6502
  189.  
  190. FREMX
  191.  LDA #FFEXT
  192.  PHA
  193.  LDA #FOREM
  194.  PHA
  195.  JSR FP6502
  196.  
  197. FREMD
  198.  LDA #FFDBL
  199.  PHA
  200.  LDA #FOREM
  201.  PHA
  202.  JSR FP6502
  203.  
  204. FREMS
  205.  LDA #FFSGL
  206.  PHA
  207.  LDA #FOREM
  208.  PHA
  209.  JSR FP6502
  210.  
  211. FREMC
  212.  LDA #FFCOMP
  213.  PHA
  214.  LDA #FOREM
  215.  PHA
  216.  JSR FP6502
  217.  
  218. FREMI
  219.  LDA #FFINT
  220.  PHA
  221.  LDA #FOREM
  222.  PHA
  223.  JSR FP6502
  224.  
  225. FREML
  226.  LDA #FFLNG
  227.  PHA
  228.  LDA #FOREM
  229.  PHA
  230.  JSR FP6502
  231.  
  232. FLOGBX
  233.  LDA #0
  234.  PHA
  235.  LDA #FOLOGB
  236.  PHA
  237.  JSR FP6502
  238.  
  239. FSCALBX
  240.  LDA #FFINT
  241.  PHA
  242.  LDA #FOSCALB
  243.  PHA
  244.  JSR FP6502
  245.  
  246. FCPYSGNX
  247.  LDA #FFEXT
  248.  PHA
  249.  LDA #FOCPYSGN
  250.  PHA
  251.  JSR FP6502
  252.  
  253. FCPYSGND
  254.  LDA #FFDBL
  255.  PHA
  256.  LDA #FOCPYSGN
  257.  PHA
  258.  JSR FP6502
  259.  
  260. FCPYSGNS
  261.  LDA #FFSGL
  262.  PHA
  263.  LDA #FOCPYSGN
  264.  PHA
  265.  JSR FP6502
  266.  
  267. FCPYSGNC
  268.  LDA #FFCOMP
  269.  PHA
  270.  LDA #FOCPYSGN
  271.  PHA
  272.  JSR FP6502
  273.  
  274. FCPYSGNI
  275.  LDA #FFINT
  276.  PHA
  277.  LDA #FOCPYSGN
  278.  PHA
  279.  JSR FP6502
  280.  
  281. FCPYSGNL
  282.  LDA #FFLNG
  283.  PHA
  284.  LDA #FOCPYSGN
  285.  PHA
  286.  JSR FP6502
  287.  
  288. FNEGX
  289.  LDA #0
  290.  PHA
  291.  LDA #FONEG
  292.  PHA
  293.  JSR FP6502
  294.  
  295. FABSX
  296.  LDA #0
  297.  PHA
  298.  LDA #FOABS
  299.  PHA
  300.  JSR FP6502
  301.  
  302. FNEXTS
  303.  LDA #FFSGL
  304.  PHA
  305.  LDA #FONEXT
  306.  PHA
  307.  JSR FP6502
  308.  
  309. FNEXTD
  310.  LDA #FFDBL
  311.  PHA
  312.  LDA #FONEXT
  313.  PHA
  314.  JSR FP6502
  315.  
  316. FNEXTX
  317.  LDA #FFEXT
  318.  PHA
  319.  LDA #FONEXT
  320.  PHA
  321.  JSR FP6502
  322.  
  323. FX2X
  324.  LDA #FFEXT
  325.  PHA
  326.  LDA #FOZ2X
  327.  PHA
  328.  JSR FP6502
  329.  
  330. FD2X
  331.  LDA #FFDBL
  332.  PHA
  333.  LDA #FOZ2X
  334.  PHA
  335.  JSR FP6502
  336.  
  337. FS2X
  338.  LDA #FFSGL
  339.  PHA
  340.  LDA #FOZ2X
  341.  PHA
  342.  JSR FP6502
  343.  
  344. FI2X
  345.  LDA #FFINT
  346.  PHA
  347.  LDA #FOZ2X
  348.  PHA
  349.  JSR FP6502
  350.  
  351. FL2X
  352.  LDA #FFLNG
  353.  PHA
  354.  LDA #FOZ2X
  355.  PHA
  356.  JSR FP6502
  357.  
  358. FC2X
  359.  LDA #FFCOMP
  360.  PHA
  361.  LDA #FOZ2X
  362.  PHA
  363.  JSR FP6502
  364.  
  365. FX2D
  366.  LDA #FFDBL
  367.  PHA
  368.  LDA #FOX2Z
  369.  PHA
  370.  JSR FP6502
  371.  
  372. FX2S
  373.  LDA #FFSGL
  374.  PHA
  375.  LDA #FOX2Z
  376.  PHA
  377.  JSR FP6502
  378.  
  379. FX2I
  380.  LDA #FFINT
  381.  PHA
  382.  LDA #FOX2Z
  383.  PHA
  384.  JSR FP6502
  385.  
  386. FX2L
  387.  LDA #FFLNG
  388.  PHA
  389.  LDA #FOX2Z
  390.  PHA
  391.  JSR FP6502
  392.  
  393. FX2C
  394.  LDA #FFCOMP
  395.  PHA
  396.  LDA #FOX2Z
  397.  PHA
  398.  JSR FP6502
  399.                                         
  400. FX2DEC
  401.  LDA #FFEXT
  402.  PHA
  403.  LDA #FOB2D
  404.  PHA
  405.  JSR FP6502
  406.  
  407. FD2DEC
  408.  LDA #FFDBL
  409.  PHA
  410.  LDA #FOB2D
  411.  PHA
  412.  JSR FP6502
  413.  
  414. FS2DEC
  415.  LDA #FFSGL
  416.  PHA
  417.  LDA #FOB2D
  418.  PHA
  419.  JSR FP6502
  420.  
  421. FC2DEC
  422.  LDA #FFCOMP
  423.  PHA
  424.  LDA #FOB2D
  425.  PHA
  426.  JSR FP6502
  427.  
  428. FI2DEC
  429.  LDA #FFINT
  430.  PHA
  431.  LDA #FOB2D
  432.  PHA
  433.  JSR FP6502
  434.  
  435. FL2DEC
  436.  LDA #FFLNG
  437.  PHA
  438.  LDA #FOB2D
  439.  PHA
  440.  JSR FP6502
  441.  
  442. FDEC2X
  443.  LDA #FFEXT
  444.  PHA
  445.  LDA #FOD2B
  446.  PHA
  447.  JSR FP6502
  448.  
  449. FDEC2D
  450.  LDA #FFDBL
  451.  PHA
  452.  LDA #FOD2B
  453.  PHA
  454.  JSR FP6502
  455.  
  456. FDEC2S
  457.  LDA #FFSGL
  458.  PHA
  459.  LDA #FOD2B
  460.  PHA
  461.  JSR FP6502
  462.  
  463. FDEC2C
  464.  LDA #FFCOMP
  465.  PHA
  466.  LDA #FOD2B
  467.  PHA
  468.  JSR FP6502
  469.  
  470. FDEC2I
  471.  LDA #FFINT
  472.  PHA
  473.  LDA #FOD2B
  474.  PHA
  475.  JSR FP6502
  476.  
  477. FDEC2L
  478.  LDA #FFLNG
  479.  PHA
  480.  LDA #FOD2B
  481.  PHA
  482.  JSR FP6502
  483.  
  484. FCMPX
  485.  LDA #FFEXT
  486.  PHA
  487.  LDA #FOCMP
  488.  PHA
  489.  JSR FP6502
  490.  
  491. FCMPD
  492.  LDA #FFDBL
  493.  PHA
  494.  LDA #FOCMP
  495.  PHA
  496.  JSR FP6502
  497.  
  498. FCMPS
  499.  LDA #FFSGL
  500.  PHA
  501.  LDA #FOCMP
  502.  PHA
  503.  JSR FP6502
  504.  
  505. FCMPC
  506.  LDA #FFCOMP
  507.  PHA
  508.  LDA #FOCMP
  509.  PHA
  510.  JSR FP6502
  511.  
  512. FCMPI
  513.  LDA #FFINT
  514.  PHA
  515.  LDA #FOCMP
  516.  PHA
  517.  JSR FP6502
  518.  
  519. FCMPL
  520.  LDA #FFLNG
  521.  PHA
  522.  LDA #FOCMP
  523.  PHA
  524.  JSR FP6502
  525.  
  526. FCPXX
  527.  LDA #FFEXT
  528.  PHA
  529.  LDA #FOCPX
  530.  PHA
  531.  JSR FP6502
  532.  
  533. FCPXD
  534.  LDA #FFDBL
  535.  PHA
  536.  LDA #FOCPX
  537.  PHA
  538.  JSR FP6502
  539.  
  540. FCPXS
  541.  LDA #FFSGL
  542.  PHA
  543.  LDA #FOCPX
  544.  PHA
  545.  JSR FP6502
  546.  
  547. FCPXC
  548.  LDA #FFCOMP
  549.  PHA
  550.  LDA #FOCPX
  551.  PHA
  552.  JSR FP6502
  553.  
  554. FCPXI
  555.  LDA #FFINT
  556.  PHA
  557.  LDA #FOCPX
  558.  PHA
  559.  JSR FP6502
  560.  
  561. FCPXL
  562.  LDA #FFLNG
  563.  PHA
  564.  LDA #FOCPX
  565.  PHA
  566.  JSR FP6502
  567.  
  568. FBEQ
  569.  BEQ &1
  570.         
  571. FBLT
  572.  BMI &1
  573.  
  574. FBLE
  575.  BMI &1
  576.  BEQ &1
  577.  
  578. FBGT
  579.  BVS &1
  580.  
  581. FBGE
  582.  BVS &1
  583.  BEQ &1
  584.  
  585. FBULT
  586.  BMI &1
  587.  BVS *+4
  588.  BNE &1
  589.  
  590. FBULE
  591.  BMI &1
  592.  BEQ &1
  593.  BVC &1
  594.  
  595. FBUGT
  596.  BVS &1
  597.  BMI *+4
  598.  BNE &1
  599.  
  600. FBUGE
  601.  BVS &1
  602.  BEQ &1
  603.  BPL &1
  604.  
  605. FBO
  606.  BMI &1
  607.  BVS &1
  608.  BEQ &1
  609.  
  610. FBU
  611.  BVS *+6
  612.  BMI *+4
  613.  BNE &1 
  614.  
  615. FBNE
  616.  BMI &1
  617.  BVS &1
  618.  BNE &1
  619.  
  620. FBUE
  621.  BEQ &1
  622.  BMI *+4
  623.  BVC &1
  624.  
  625. FBLG
  626.  BMI &1
  627.  BVS &1
  628.  
  629. FCLASSS
  630.  LDA #FFSGL
  631.  PHA
  632.  LDA #FOCLASS
  633.  PHA
  634.  JSR FP6502
  635.  
  636. FCLASSD
  637.  LDA #FFDBL
  638.  PHA
  639.  LDA #FOCLASS
  640.  PHA
  641.  JSR FP6502
  642.  
  643. FCLASSX
  644.  LDA #FFEXT
  645.  PHA
  646.  LDA #FOCLASS
  647.  PHA
  648.  JSR FP6502
  649.  
  650. FCLASSC
  651.  LDA #FFCOMP
  652.  PHA
  653.  LDA #FOCLASS
  654.  PHA
  655.  JSR FP6502
  656.  
  657. FCLASSI
  658.  LDA #FFINT
  659.  PHA
  660.  LDA #FOCLASS
  661.  PHA
  662.  JSR FP6502
  663.  
  664. FCLASSL
  665.  LDA #FFLNG
  666.  PHA
  667.  LDA #FOCLASS
  668.  PHA
  669.  JSR FP6502
  670.  
  671. FBSNAN
  672.  CPX #FCSNAN
  673.  BEQ &1
  674.          
  675. FBQNAN
  676.  CPX #FCQNAN
  677.  BEQ &1
  678.  
  679. FBINF
  680.  CPX #FCINF
  681.  BEQ &1
  682.  
  683. FBZERO
  684.  CPX #FCZERO
  685.  BEQ &1
  686.  
  687. FBNORM
  688.  TXA
  689.  BEQ &1
  690.  
  691. FBDENORM
  692.  CPX #FCDENORM
  693.  BEQ &1
  694.  
  695. FBNZENUM
  696.  TXA
  697.  BPL &1
  698.  
  699. FBNUM
  700.  INX
  701.  BPL &1
  702.  
  703. FBMINUS
  704.  BMI &1
  705.  
  706. FBPLUS
  707.  BPL &1
  708.  
  709. FGETENV
  710.  PHA
  711.  LDA #FOGETENV
  712.  PHA
  713.  JSR FP6502
  714.  
  715. FSETENV
  716.  PHA
  717.  LDA #FOSETENV
  718.  PHA
  719.  JSR FP6502
  720.  
  721. FTESTXCP
  722.  PHA
  723.  LDA #FOTESTXCP
  724.  PHA
  725.  JSR FP6502
  726.  
  727. FSETXCP
  728.  PHA
  729.  LDA #FOSETXCP
  730.  PHA
  731.  JSR FP6502
  732.  
  733. FPROCENTRY
  734.  PHA
  735.  LDA #FOPROCENTRY
  736.  PHA
  737.  JSR FP6502
  738.  
  739. FPROCEXIT
  740.  PHA
  741.  LDA #FOPROCEXIT
  742.  PHA
  743.  JSR FP6502
  744.  
  745. FGETHV
  746.  PHA
  747.  LDA #FOGETHV
  748.  PHA
  749.  JSR FP6502
  750.  
  751. FSETHV
  752.  PHA
  753.  LDA #FOSETHV
  754.  PHA
  755.  JSR FP6502
  756.  
  757. FLNX
  758.  PHA
  759.  LDA #FOLNX
  760.  PHA
  761.  JSR ELEMS6502
  762.  
  763. FLOG2X
  764.  PHA
  765.  LDA #FOLOG2X
  766.  PHA
  767.  JSR ELEMS6502
  768.  
  769. FLN1X
  770.  PHA
  771.  LDA #FOLN1X
  772.  PHA
  773.  JSR ELEMS6502
  774.  
  775. FLOG21X
  776.  PHA
  777.  LDA #FOLOG21X
  778.  PHA
  779.  JSR ELEMS6502
  780.  
  781. FEXPX
  782.  PHA
  783.  LDA #FOEXPX
  784.  PHA
  785.  JSR ELEMS6502
  786.  
  787. FEXP2X
  788.  PHA
  789.  LDA #FOEXP2X
  790.  PHA
  791.  JSR ELEMS6502
  792.  
  793. FEXP1X
  794.  PHA
  795.  LDA #FOEXP1X
  796.  PHA
  797.  JSR ELEMS6502
  798.  
  799. FEXP21X
  800.  PHA
  801.  LDA #FOEXP21X
  802.  PHA
  803.  JSR ELEMS6502
  804.  
  805. FXPWRI
  806.  PHA
  807.  LDA #FOXPWRI
  808.  PHA
  809.  JSR ELEMS6502
  810.  
  811. FXPWRY
  812.  PHA
  813.  LDA #FOXPWRY
  814.  PHA
  815.  JSR ELEMS6502
  816.  
  817. FCOMPOUND
  818.  PHA
  819.  LDA #FOCOMPND
  820.  PHA
  821.  JSR ELEMS6502
  822.  
  823. FANNUITY
  824.  PHA
  825.  LDA #FOANNUIT
  826.  PHA
  827.  JSR ELEMS6502
  828.  
  829. FATANX
  830.  PHA
  831.  LDA #FOATANX
  832.  PHA
  833.  JSR ELEMS6502
  834.  
  835. FSINX
  836.  PHA
  837.  LDA #FOSINX
  838.  PHA
  839.  JSR ELEMS6502
  840.  
  841. FCOSX
  842.  PHA
  843.  LDA #FOCOSX
  844.  PHA
  845.  JSR ELEMS6502
  846.                                         
  847. FTANX
  848.  PHA
  849.  LDA #FOTANX
  850.  PHA
  851.  JSR ELEMS6502
  852.  
  853. FRANDX
  854.  PHA
  855.  LDA #FORANDX
  856.  PHA
  857.  JSR ELEMS6502
  858.  
  859.